home *** CD-ROM | disk | FTP | other *** search
- object ShutdownForm: TShutdownForm
- Left = 194
- Top = 111
- BorderIcons = [biSystemMenu, biMinimize]
- BorderStyle = bsSingle
- Caption = 'Remote shutdown'
- ClientHeight = 281
- ClientWidth = 305
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- FormStyle = fsMDIChild
- Icon.Data = {<image000.ico>}
- KeyPreview = True
- OldCreateOrder = False
- Position = poDefault
- Visible = True
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- PixelsPerInch = 96
- TextHeight = 13
- object Label3: TLabel
- Left = 8
- Top = 146
- Width = 46
- Height = 13
- Caption = '&Message:'
- FocusControl = Memo
- end
- object GroupBox1: TGroupBox
- Left = 8
- Top = 3
- Width = 289
- Height = 48
- Caption = 'Remote PC'
- TabOrder = 0
- object Label1: TLabel
- Left = 76
- Top = 18
- Width = 31
- Height = 13
- Caption = '&Name:'
- FocusControl = edtComputerName
- end
- object edtComputerName: TEdit
- Left = 118
- Top = 16
- Width = 128
- Height = 21
- MaxLength = 17
- TabOrder = 0
- end
- object btnBrowse: TButton
- Left = 255
- Top = 16
- Width = 23
- Height = 22
- Caption = '....'
- TabOrder = 1
- OnClick = btnBrowseClick
- end
- end
- object GroupBox2: TGroupBox
- Left = 8
- Top = 55
- Width = 289
- Height = 90
- Caption = 'Settings'
- TabOrder = 1
- object Label2: TLabel
- Left = 68
- Top = 60
- Width = 52
- Height = 13
- Caption = '&Time (sec):'
- FocusControl = edtTimeout
- end
- object chkForce: TCheckBox
- Left = 68
- Top = 17
- Width = 197
- Height = 13
- Caption = '&Force reboot of remote PC'
- TabOrder = 0
- end
- object chkReboot: TCheckBox
- Left = 68
- Top = 38
- Width = 213
- Height = 13
- Caption = '&Rebboot after shutdown all programs'
- Checked = True
- Color = clMenu
- ParentColor = False
- State = cbChecked
- TabOrder = 1
- end
- object edtTimeout: TEdit
- Left = 177
- Top = 58
- Width = 33
- Height = 21
- ReadOnly = True
- TabOrder = 2
- Text = '40'
- end
- object udTimeout: TUpDown
- Left = 210
- Top = 58
- Width = 15
- Height = 21
- Associate = edtTimeout
- Min = 0
- Position = 40
- TabOrder = 3
- Wrap = False
- end
- end
- object btnOK: TButton
- Left = 8
- Top = 248
- Width = 75
- Height = 25
- Caption = 'OK'
- Default = True
- TabOrder = 3
- OnClick = btnOKClick
- end
- object btnAbort: TButton
- Left = 115
- Top = 248
- Width = 75
- Height = 25
- Caption = '&Cancel'
- Enabled = False
- TabOrder = 4
- OnClick = btnAbortClick
- end
- object btnExit: TButton
- Left = 222
- Top = 248
- Width = 75
- Height = 25
- Caption = 'C&lose'
- TabOrder = 5
- OnClick = btnExitClick
- end
- object Memo: TMemo
- Left = 8
- Top = 160
- Width = 289
- Height = 79
- Lines.Strings = (
- 'Your PC will reboot.')
- MaxLength = 127
- ScrollBars = ssVertical
- TabOrder = 2
- end
- end
-